بسم الله الرحمن الرحيم 
وبه نستعین 
والصلاه والسلام على سيدنا محمد خاتم الانبياء والمرسلين 


mı 9 التعامال‎ 


Active x data object 


تألیف / سامح سنوسی 
Tel, \ +201099184173‏ 
samauthorit ahoo.com‏ 


لمزيد من الكتب تفضلو بزياره www.cb4a.con‏ 
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اهداء 
بسم الله الرحمن الرحيم 


"رب قد اتيتنى من الملك وعلمتنى من تأويل الاحاديث فاطر السموات والارض انت ولى 
فى الدنيا والاخره توفتى مسلما والحقنى بالصالحين" 


صدق الله العظيم 


فی البدايه ... وقبل ان استرسل فی الحدیث اوجه شکری وحبى وتقديرى الى الحبيب الغالى 


الى نبع الحب... 


الى نبع العطاءع... 


و ادین بکل الشكر والتقدیر الى کل اساتذتی ومعلمینى 
جعل الله عطاءهم فی ميزان حسناتهم 
والی کل من علمنی حرفا ... 
والشكر لله 


ملحوظه: هذا الکتاب مجانی ولا يجوز بیعه الا بمواقفقه کتابیه من المؤلف 
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فهرس الكتاب 


تعریف مکتبه‌58 ۸50.01۴ 
ممیزات مکتبه‌۸50.01۴58 


کیغیه ربط مکتب ۸00 بقاعده بیانات ٤S5S‏ )۸)0 اصدار2000 


کیفیه ربط مکتبه ۸50 بقاعده بیانات ۸٤٥٤٥۴55‏ اصدار97 

استخدامات متطوره لمکتبه ۸50 

کیفیه التعامل مع ۴ا۴۱ ۸۲ا۴ من خلال مکتبه )0L۴58(‏ .۸50 
استخدام حمل الاستعلاما@5فى الربط بقواعد البيانات 


استخدامات مکتبه(58٤۸50.)01‏ فی التعامل مع البیانات 


samauthorit ahoo.com 
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۸50 اولا: تعریف مکتبه‎ 
<<ACTIVE X DATA OBJECT>> 


هى مكتبه تعمل تحت بيئه فيجوال بيسك وايضا العديد من لغات البرمجه الاخرى وتحتوى على عده 
خواص › حيث يمكنها الربط بين قواعد البيانات والفيجوال بيسك بسهوله 
فهى بالقدر الكافى لاحتمال قواعد البيانات الضخمه 
لا تعمل تحت بيئه الفيجوال بيسك فقط › وانما يمكنها العمل تحت العديد من لغات البرمجه وبرامج 
التطبيقات المختلفه 


على سبيل المثال وليس الحصر... 
Visual basic *‏ 
Visual basic.net *‏ 


<VB.EDITOR> JÛJîڵخÈ‎ jùjaMicrosoft power point * 


وايضا تعمل مع العديد من انواع قواعد البيانات الضخمه 
مثل: 
ORACLE *‏ 
SQL SERVER *‏ 
ACCESS *‏ 


* وفی شرحنا باذن الله سنتناول كيفيه الربط بعده قواعد بيانات 


وایضا تحتوی على عده ادوات ملحقه من اهمها: 
Microsoft DB GRID 6.0(OLEDB)‏ 


Microsoft DB LIST GRID 6.0(OLEDB) 
Microsoft hieratical flex grid Control 6.0(OLEDB) 
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ممیزات مکتبه‌0 ۸0 


1 اولا القوه فی حفظ كميه هائله من البيانات. 


2- التعامل مع العديد من قواعد البيانات وهى ميزه فريده من نوعها بالنسبه لهذه المكتبه. 


3- سوال المستخدم عن نوع قاعده البيانات المراد استخدامها. 


4- سوال المستخدم عن اذا كان هناك شفره لقاعده البيانات ام لا 


5 یمکن استخدامها مع بیانات مسجله علی 9٤E ۸ ۷ E۸‏ والتعامل معھا بکل سهوله . 


6- تتمیز عن مکتبه 1۸01 D۸۲۸ C0٥0 N‏ التقلیدیھ فی انھا تتعامل مع جمیع اصدارات 
.ACCESS‏ 


7- تتمیز عن D۸0 data contr016.0 )01٤(8(‏ فی انھا تسأل المستخدم عن نوع 
قاعده البیانات المستخدمه کما اسلفنا › ای انها ليست قاصره على قواعد بیانات؟؟S٤ ۸٤٥٤٥‏ 
کما الحال فی مکتبه(0۸0) . 
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کیفیه ربط مکتبه 50 ۸بقاعده بیانات ۸٤٨0٣٤558‏ اصدار2000 
اول انشام قاڪء بيات اگسس 
lûnں‏ بlصم...)data (Customers‏ 
تم ننشیء جدول یسمی مثلا ( اعد ٥tیوuںC٤)‏ 
بعد ادخال اlبيlنlت)[mai1-e¢‏ - (Id - Name - Address - phone‏ 
نقوم بفتح بيئه الفيجوال بيسك 


ثم انشاء مشروع قیاسی جدید 


ثم احضار مكتڊ4 ADO DATA CONTROL (OLED8)‏ 
من قائم4ی٤‏ ,رمم ہ٥٥‏ کما بالشکل 
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كما فى الشكل التالى (المكتبات) 


[I IStudia Active Designer Controls 
[ ILayoutDT E 1.0 Type Library 
LI Microsoft Aclivex Plagin 


| 1M osoft een Control 2 0 

Û] Microsoft Calendar Control £,0 

[ I Microsoft Chart Control B.O [OLEDE] 

[ I Microsoft Camm Control 6.0 

Û Microsoft Common Dialog Control 6.0 

[I Microsoft Data Bound Grid Control 5.0 (SP3] 
[ I Microsoft Data Bound List Cantrals 6.0Û 


[Ll Microsoft tata rid Control 6.0 [OLED] 2 
ıı Mictasaft DataList Controls 6.0 [OLEDE] ا‎ ___ Bromse.. | 
7 ١ غا‎ TF Sued items Ol 


Microsoft ADO Data Control ë.O (OLEDE)} 
[ Location: TC WINDOWNSSYStem 32 \MSADODE. OC 


ثم اضافتها الى الفورم 
ثم نقوم بتغيير خصائصها من خلال النافذه التاليه 


Adodc properties 


2 


Bf ing TO FFONL 
Send 1û Bak 


Yiew Code 
Align tû Grid 
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ثم من خلال نافذہ چہذاt؟ Connecti‏ ای نوعیه التوصیل 


BUILD رlتخi‎ 


General | authentication | RecordSaurce | color | Font | 


Source of Connection 


f Use Data Link File 
` Use ODEC Data Source Name 


Use Connection String 


Other Attributes: 


| ا 


&. Formî 


سوف تسأل المكتبه عن نوعيه قاعده البيانات المراد استخدامها وذلك من خلال جمل التعاريف 
الاتيه والخاصه بکل مزود خدمه او قاعده بیانات کما ا الشكل التالى: 


8 


E 


ڪڪ ن ل 


Provider | Connection | Advanced | All | 


Select the data you want to connect to: 


MediaCatalogDB OLE DE Provider 
MediaCatalogMergedDE DOLE DB Provider 
MediaLatalogwebDE DLE DB Provider 
Microsoft Jet 3.51 OLE DB Provider 

Microsoft Jet 4.0 OLE DB Provid tT 


CAE : 1 : 
Microsoft OLE DB Provider For Data Mining Services 
Microsoft OLE DE Provider for Indexing Service 
Microsoft OLE DB Provider for Internet Publishing 
Microsoft DLE DB Provider for ODBC Drivers 
Microsoft OLE DE Provider for OL4P Services 8.0 
Microsoft OLE DB Provider for Oracle 
Microsoft OLE DB Provider for Dullook Search 
Microsoft OLE DB Provider for SIL Server 
Microsoft OLE DB Simple Provider 
MSDataShape 
OLE DB Provider for Microsoft Directory Services 


> e1 


Ok Cancel Help 


5 
| Data Link Properties 
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نختار جمله التعريف الخاصه بقاعده البيانات المستخدمه ووءءءه اصدار 2000 


وهی کالتالی: 
Microsoft JET4.0 OLEDB Provider‏ 


ثم نضغط ٤ع‏ لتحديد اسم قاعده البيانات ومكانها 
من خلال الٺaرڙ Connection‏ 


كما فى الشكل التالى: 


Êd Data Link Properties * 


Provider Connection | Advanced | 4l | 


Specify the following to connect lo ûccess data: 
1. Select or enter a database name: 


A. Enter information to lag an to the database: 
Liser name: [admin 
FaSSNOTH | 


¥ Blank password Î Allow saving password 


Test Conneclon 
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وايضا من الممكن التعديل فى شفره قاعده البيانات من خلال الامر 

ALLOW saving password 
او جعلها افتراضيه من خلال الامر‎ 

Blank Password 

فهذا الامر يحتوى على اسم المستخدم ايضا وتستخدم هذه الخيارات غالبا مع قواعد البيانات التى 
تكون فى اماكن غير موضع البرنامج المحتوى على بيانات هذه القاعده... 
اى تكون مرفوع4 عأ SERVER‏ 
ملحوظه: 
لاتمام عمليه ربط قاعده بيانات ببرنامج الفيجوال بيسك والتی تکون مرفوعه علڦ‫‌ SER۸ ۷ ٤R‏ 
يفضل استخدام قاعدە بیاناتR 9Q1 SE ۸ ۷٤‏ او قاعدہ بیانات بتکنولوجیا۴ 0٥0۸۸ ٥°‏ 


*٭بعد فتح قاعده البيانات المطلوبه نضغط على الزر الئمکتوب Eعilي4 Test connection‏ 
وذلك لاختبار عمليه التوصيل بقاعده البيانات. 
Data Link Properties‏ 


Provider Connection | Advanced | Al | 


Specify lhe following lo connect to Access dala: 
1. Select or enter a database name: 


[CADccuments ard SeltingstsamtDesklophprojecthpra) 8 


2. Enter information to log ori to the database: 
User name: jûdmin 


Microsoft Data Link 


Test Connection | 


OK Cancel | Help ۰ 


يجب ان تظهر الرساله التاليه 
Test Connection Succeeded‏ 
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الان قد تمت عمليه التوصيل بقاعده البيانات المطلوبه وتم تحديد نوعها 
ينقص فقط تحديد الجدول المراد التعامل معه من خلال القاعده 

RECORD SOURCE خاصڍ4‎ Jîڻlخ‎ jùم‎ 

كما فى الشكل التالى: 


| Property Pages 


General | Authentication RecordSource | color | Font | 


; RecordSource 
Cornrmnand Type 

8 - adCmdllrknowr ج‎ 
1 - adCmdT ext 

2 - ad CmdT able 

4 - ad mdStored Proc 


Command Text [SAL] 


وايضا يمكن اختيار نوع طريقه استدعاء الجدول وذلك لتسهيل عمليه الربط 

اسهل الطرق هى اختيار الامر م1إطAdCnd71a‏ 

Command type من قائم4‎ 

وهى لاختيار الجدول عن طريق اسمه او انشاء طريقه الاستدعاء بالجداول» كما هو موضح فى 
الشكل التالى: 


Property Pages 1 


General | Authentication Racardeuwca | Zolr | Font | 
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هناك طريقه اخرى لأجراء عمليه الاستدعاء للجدول المطلوب وهى عن طريق كتابه جمله 8Q1‏ 
وذلك بعد اختيار ×٤‏ ۸4€ وذلك من التبويب .°٥012124 1d 1 ype‏ 
ثم كتابه جمله الاستعلام فى المكان الموضح بالشكل التالى : 


| Property Pages س‎ i 
General | Authentication RecordSource | color | Font | 


r RecordSource 
Command Type 


Table or Stored Procedure Name 


Command Text [SAL] 


کی ا 


وفى المكان المخصص لكتابه جمله الاستعلام يمكن كتابه الجمله التاليه 
SELECT*FROM CUSTOMER‏ 


كما فى الشكل التالى: 


|| General | Authentication RecordSource | color | Font | 
RecoardSource 
Command Type 


[1 adCmaT ex [ ِ 


Table or Stored Procedure Name 


Command Text [SQL] 


* FROM INYWOICEÎ 0 -—- 
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شرح الجمله 


اخاطب الان المكتبه 
واقول لها اختاری كل الحقول من الجدول I1N۷ 01٣٤‏ 
حيث اختlر SEL EC T=‏ 

كل الحقول =* 

من الجدول = "اسم الجدوۈولڵل'" FROM‏ 


* ويمكن عمل جمل استعلام اكثر دقه من هذه... 

- فمثلا ان اردت الاستعلام عن حقل معين 

- او اسماء مشترکه فی حقل معین 

- او اسم فقط 

سوف نوالی شرحها باذن الله مستقبلا... 

المقصود من هذا ان هذه المكتبه بالقدر الكافى لاستيعاب جمل الاستعلام بكافه انواعها 
وهذا يجعلها بالقوه الكافيه للمنافسه فى عصر البرمجيات. 


وبعد كل هذه العمليات يمكننا الان العمل على بيئه الفيجوال بيسك وتحديد الخصائص لربط قاعده 
البيانات بالواجهه المناسبه لها 


نقوم بعمل بيئه مناسبه لقاعده بيانات تنص على" بيانات الزبائن او العملاء" 
فهى تحتوى على الحقول التاليه: 


ID‏ النوع 
NAME‏ النوع 
ADRESS‏ انوع 
PHONE‏ النوع 
E-MAIL‏ النوع 


E. $. £. E.E. 


ثم حفظ قاعدہ بlناٽ‏ ڊlسp CUSTOMER. mdb‏ 
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كما فى الشكل التالى: 


Î customers data : Database (Ãcceşs 7000 file format] En 
ا ی ا ا‎ 


|#*|1  |sameh hassan _ cairo 0109918473 _ samauthority @yahoo corm] 
2 | mohammed hassan cairo 0108639437 _ m_hass@yahoo.com 
الان بعد ذلك نقوم بربط هذه القاعده بفيجوال بيسك عن طريق الخطوات السابقه‎ 
ملحو ظه.‎ 


الان لا تحتاج الى تحويل قاعده البيانات الى اصدار سابق بل يتم العمل عليها مباشره 
من خلال مکتب+(8 ٤5‏ _0) .۸50 


کما کان الحال فی مكٿتب4+ .DATACONTROL‏ 
مكونات واجهه فيجوال بيسك المستخدمه هى: 
LABLE‏ 5 

5 TEXT boxes 


ومکتبه ۸50 
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بعد وضع المكونات على الفورم يرجى التنسيق الى ان تصل الى الشكل التالى: 


الان 

وبعد ان قمنا بتوصيل المكتبه بقاعده البيانات 
نقوم بتوصيل ادوات النواتج بالمكتبه 

كما فى الاشكال التاليه: 


بالنسبه لحقل (0]: 


" u e . 5 آ‎ 
a RE ST a A E ES BackColor LL] &HEsOOODOOOSE) 
EERE کا کد‎ Û E Border Style 1 - Fixed Single 
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:Naصم بالنسبه لحقل‎ 
FESTA A Ea ۰ [_] aHsooooo0ost 
RE A E PERE 1 - Fixed Single 
l(CausesYalidation True 
r 
SS DataFormat 
& DataMermber 


REET . - - ` - j A Datasource Adodc1 


mmm mm mmm mM mS wm mw 


u. sm oS mm 


11l 


بالنسبه لحقلووءAddr:‏ 


OE EET E Eg : = adre55 


AEMIDE 
A50UCE Adodec1 


بالنسبه أحقل ٥ہ‏ 0ط٣:‏ 


DataForrmmat 
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بالنسبه لحقل [زھصہٍ-۴: 


وبعد ان تمت عمليه التوصيل قم بتشغيل البرنامج سوف تحصل على النتيجه المطلوبه باذن الله. 
كما فى الشكل التالى: 


Fı Form1 ات‎ 


sameh hassari 


E-mail 


4 Adodeî DI 
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کیفیه ربط مکتبه 0( ۸بقاعدہ بیانات ۸٤°0٣ ٤85‏ اصدار97 
لقد تعرفنا فى الموضوع السابق على كيفيه الربط بقاعد:SS٤ C٣‏ ۸اصدار 97 
الان سوف نتعرف على كيفيه التعامل مع الاصدار 97 منها 
هناك بعض التغيرات الطفيفه فقط وهى كالتالى: 
من خلال قاعده البيانات نقوم بتحويل قاعده البيانات الى اصدار سابق من خلال 


To access97file format>Convert database >database utilities>T00ls ئم41‎ 


كما فى الشكل التالى: 


_ ervertBatabase + Todecese9LFFoMeks 
tompatk and Repaîr Database... To Arrass 20A Fle Format... 
Tak To Access 200ğ File Format... 


ÊÊ ake MDE File... 
3 


ومن خلال الفيجوال بيسك ومكتبه ۸500... 


نقوم بتغيير جمله تعريف قاعده البيانات او مزود الخدمه من خلال 
PROVIDER‏ 
نكتب الجمله الاتيه: 
Microsoft Jet 3.51 OLE DB Provider‏ 
ونكمل باقى الخطوات كما الحال مع اصدار2000 
ملحوظه: 
لقد قمت بذكر كيفيه ربط المكتبه بقاعده بيانات 97 فقط لاثبات ان هذه المكتبه قادر على التعامل 


مع كل قواعد البيانات وبكافه الاصدارات. 
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استخدامات متطوره لمکتبه ۸50 
تمكنك مكتبه+0 ۸5 من عمل العديد من التطبيقات المميزه وذلك لاحتوائها على ملحقات 
من اهم هذه الملحقات هى : 


<<Microsoft Data Grid Control 6.0(OLEDB)>> 


Components x 
Controls | Designers | Insertable Objects | 


[1 Microsoft Calendar Control 8.0 
[_[ Microsoft Chart Control 6.0 (OLE DB) 
_ I Microsoft Comm Control 6.0 
ll Microsoft Common Dialog Control 6.0 
[I Microsoft Data Bound Grid Control 5.0 (SP3} |2| 


Û] Microsoft Data ا نا‎ Controls 6.0 


[I] Microeolt DataList Conirole 6.0 (OLE DE) 
[ Microsoft DataRepeater Control 6.0 (OLE DB] 
ll Microsoft DDS 
[I Microsoft Directûnimation Media Controls 
[1 Microsoft DTC Framework 
1 ect FlexGrid Control 6.Û 
4 J 


r Microsoft DataGrid Control 6,0 (OLEDB) - 
Location: CH WINDOWS\system32\MSDATGRD.OCK 


وهذه المكتبه الملحقه تمكنك من عرض البيانات كلها او جزء منها 
وذلك عن طريق ربطها بالمكتبه 


كمافى الشكل التالى: 


19 
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1-0 
(J BHBODOOODEE 
1 - dbqfixedêing| 


Soft drinks, coffees, lea 
Condiments Sweet and savöıy sauce 
Confections Desserts, candies, and 

Dairy Products Cheeses 

Breads, crackers, pasta 
Prepared meals 

Dried fruit and bean cut 
Seaweed and fish 


1| 4 | Adodeî1 


20 
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* وايضا يمكنك التعديل گی خصانصها من خلال قائمه الخصائص من خلال !لمر CUSTOME‏ 


كما فى الشكل التالى: 


وذلك بتغيير الخصائص مئل عدد الصفوف وعدد الاعمده 
منك انتا تقر صقن الاق يشاك افنحكة 
فيمكنك تغيير نوع الجدول المرتبطه به مكتبه+0 ۸5 والعرض لجدول اخر 
ومن المميزات الهامه أaكiبB4 Microsoft Data Grid Control 6.0(0LED‏ 
انها يمكنها التعامل مع البيانات حيث يمكنك اضافه بيانات من خلالها 
او حذف بيان معين 


او اجراء تعدیل 
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بالاضافه الى تحویل نوعیه بعض البیانات الى نوعیه اخری من خلال F۴0R۸ M۸1‏ 

وايضا تمكنك من اختيار الخطوط وطريقه العرض. 

وايضا التغيير فى الشكل الخارجى لها وتغيير الالوان واختيارات كثيره اخرى... 

ومن الجدير بالذكر ان مكتب0LED8)4٧6.0(0 Microsoft Data Grid Control‏ تمكنك 
من التعامل مع اى قاعده بيانات و التحكم فى خصائصها من اضافه لبيان وحذف و تعديل وحفظ. 


ای انها لیست قاصره على التعدیل فی قواعد بیانات نو ع؟؟E٤ ۸٩٨0٤‏ فقط ... 


... وايضا من الملحقات الهامه جدا مع مكتبه ۸(0 
<<Microsoft hieratical flex grid Control 6.0(OLEDB)>>‏ 
وهی مكتبه الترتيب التسلسلى للبيانات 
وهی مكتبه مفيده جدا فى حاله التعامل مع قواعد البيانات الضخمه فهى تمكنك من فرز وترتيب 
البيانات بطريقه يدويه اى كما تريد شكل ظهور البيانات . 
تمكنك فى التحكم فى ترتيب الاعمده حسب الحاجه او الاهميه. 
وايضا تمكنك فى التحكم فى شكل الصفوف والاعمده سويا. 
وخصائص اخرى كثيره حيث التحكم فى الشكل الخارجى وعدد الصفوف و الحقول 
والالوان و الخلفيات و الخطوط ... 


ویمکن ایجادها من قائنم4 0"٥)‏ م ٤°٥1‏ 
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کما ق الشكل التالى: 


Microsoft hieratical flex grid Control 6.0(0LEDB)Jڵخ‎ ja واستدعائھا‎ 


کما ف الشكل التالى: 
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LI Mieresolt Diats Bound List Controls B.0 
LÎ Mîcrosoll atarid Conirol E.0 [OLEDE] 
] Meerosoll Datal st Conlrals 6.0 [OLE DB] 
[| Miciesotl DataRepealer Cantial 5.0 [OLEDB) 


me |‏ اسا ا ڑا اا ییا سی ا سی ا 


1 1 3 TT Seleeted tame Only 


Mierosoft Herarchical FlexGrid Control ë0 {OLEDE} 
| Location! CIIWINDOWSIEY Skea EINSHELNGD OCH 
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وبعد اضافتها للفورم یمکن ربطها بمکتبه ۸50 کما الحال فی مکتبه 6R!‏ 5۸7۸ 


DATA SOÛRCE+4ڍصاخ‎ Jالخ من‎ 
OOFOET ICYIE ر‎ OUGTIXEOIN TY | 
Laption 


CausesYalidation True 
ColumnHeaders True 

DataMernber اس‎ 
DataSource Rdodcll > 
Gef ColWwidth lAdode1 


بعد ان قمنا بربط المكتبه يمكننا الان عرض البيانات هكذا: 


Ex 


. 
ک1‎ ۹ 11 Davalio Narıcy Sales F 
|__ 2|Fuler __|Andiew __|VicePr 
|_3 |leveing |Janet __ |SalesF 
|___4|Peacock [Margaret |SalesF 
|___ S|Buchanan [Steven _|Salesk 


| BlSuwama [Michael _[SalesF 
7| Kinga Robert Sales F 
8| Callahan Lauia Inside f 


|___ SDodsworth [Anne __ [SalesF 


4 Adodce1 ا‎ 
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Microsoft hieratical flex grid Control 6.0(⁄0LED8)4ڊتكaأ من المميزات الهامه‎ 


انك من خلالها يمكنك التحكم فى عدد الصفوف والاعمده المستخدمه فى عرض البيانات 


کما فی الشکل التالی من خلال الامرہہtیںC٤:‏ 


|mISHFIEHLrIO1 MöNHFIEXGrIa 
2 


Alphabetic | Categorized | 


lAllowBigSelection True 
AllowUserResizinc O - flexResizeNc 
Appearance 1 - flex3D 
[J] &Hsoooooos 
lBackcolorBkg [J] &HSOODO0OF 
BackColorFixed [_] &H8O00000F 
lBackCcolorsel U aHsooooooc 
BackColorunpopu[] aHsoono0oF 
| O - flexBandDisF 
1 - flexBorderSir 


| 


|DataSource 


Adodc1 


(Custom) > 


Rows: [1 HENÎ Fiued Rows: EET 

Columns: KET Fiued Cols: E 

¥ AllowBigSelsction 

SeroallB ars: [3-Boh =| FillStyle: [0 -Single <] 
HighLight: [1 - Always wÎ SelectionM ode: [o-Free =| 
FocusRect: [1-Liont <] AllowllserResizing: [0-None <| 


| O «Individual _w | 


Help 


Property Pages 


| ل‎ | Bands | Style | Font | Color | Picture | 


BandDisplay: E - Horizontal آ>‎ 
MousePointer [o- Default آ>‎ 


RowSizinaM ode: 
ت ڪڪ‎ 


وتمكنك ايضا من اختيار عده حقول وصفوف فی ان واحد 
ويمكنك التحقق من الاوامر كما فى شاشه الخصائص من خلال الجدول التالى: 


GENERAL 


الامر 
التحرك داخل حيز المكتبه 
باستخدام الفأره. 
ابراز البيانات المحدده 
درجه دقه التعامل مع البيانات 
طريقه العرض 
طريقه عرض مؤشر الفاره 
TN TT‏ 
طريقه الاختيار 
السماح باعاده ضبط الحجم 
عدد الصفوف 
عد الا عمده 
السماح بوجود صفوف ثابته 
السماح بوجود اعمده ثابته 
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الخاصيه COMMAND‏ 
التحرك فى اتجاهين - التحرك فى Scrollbars‏ 
اتجاه واحد - عدم التحرك 
دائما - عند الطلب - عدم الاظهار Highlight‏ 
لاتوجد - خفیفه - مرکزه FocusRect‏ 
افقی ر سی Band Display‏ 
افتراضی - او سهم - او ايقونه Mouse Pointer  ......‏ 
فردیه - او متکرره(مزدوجه) Fill style‏ 
افتراضيه - بالصف - بالعمود Selection Mode‏ 
ابدا - الاعمده - الصفوف - كلاهما Allow User Resizing‏ 
اختیاری Rows‏ 
اختیاری Colunans‏ 
اختیاری Fixed Rows‏ 
اختیاری Fixed Cols‏ 


PDF created with pdfFactory trial version www.pdffactory.com 


General Bands | style | Font | Color | Picture | 


[Band 0 0) < 
Bandlndent 0 


dE pan dablE 


EC Cancel Apply و‎ Help 


1 - Flat ا‎ 


[0 -Flat < 


Title 

TitleOf Courtesy 
BirthDate 
HireD ale 
Addıess 


Gridlines: 


TextStple: 


TextStyleHeader: [0 - Flat آ>‎ 


_ Column Caption ا‎ Column Name 


TitleOfCourtesy‏ ك 


Property Pages 


Band: 


2] Title 


ک1 


وايضا من خلال الامرS؟5 B۸N‏ يمكنك التحكم بدقه شديده فى الصفوف والاعمده واجراء بعض 


الاوامر الهامه كما فى الجدول التالى: 


التبويب الامر 
BANDS‏ | مجمو عه صفوف مع اعمدہ 
مختاره لأمر. 


خطوط التشابك(الشبكه) 
شكل الخط 


مکل الخط الاس 


المجمو عات المحدده 
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الخاصه 


4 


وار ف 


0 


بدون - مسطح - ادخال رفع - 


ادخال بعد الرفع 


بدون - مسطح - ادخال رفع 
ادخال بعد الرفع 


بدون - مسطح - ادخال رفع - 


ادخال بعد الرفع 
اختیار ی 
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COMMAND 
Bands 


Gridlines 
Text Style 
Text Style Header 


Band Indent 


Property Pages 


General | Bands Style | Font | Color | Picture | 


GridLinesFixed: [2-Inst >] 
TextStyleFiued: [o-Flat <| 
MergeCells: [0-Neve >] 
RowHeightMin: TEE 

GridLinesllnpopulated: [a-None >] 
PictureT ype: [o-Color <| 


[` Wordwrap 


| ا 


Help 


وايضا من خلال التبويب 91۷1٤‏ يمكننا التحكم فى خصائص المكتبه او اختيار اسلوب التعامل 


كما فى الجدول التالى: 
التبويب الامر الخاصيه COMMAND‏ 
STYLE‏ خطوط التشابك الثابته | بدون - مسطح - ادخال -رفع - ادخال Grid lines Fixed‏ 
بعد الرفع 
شكل الخطوط الثابته بدون - مسطح - ادخال -رفع - ادخال Text Style Fixed‏ 
بعد الرفع 
مزج الخلايا ابدا- حر- تقييد الصفوف - تقييد Merge Cells‏ 


الاعمده - تقييد كلاهما 
خطوط التشابك الغير مقبوله | بدون - مسطح - ادخال رفع - ادخاJ‏ | GridLinsUnpopulated‏ 


(االغير مستخدمه) بعد الرفع 
نوع الصوره ملونه - احاديه اللون Picture Type‏ 
تضمين الكلمات اختیاری Word Warp‏ 
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الان قد قمنا بعرض مفصل للادوات الهامه والموؤثره فى خصائص مكتبه 
<<Microsoft hieratical flex grid Control 6.0(OLEDB)>>‏ 


لا ينقص سوى بعض الخصائص الخاصه بانواع الخطوط و الخلفيات والصور والالوان. 


تفید مكتبات(08(٤01)‏ ۸050 الرفرعیه: 
Microsoft DB GRID 6.0(OLEDB)‏ 
Microsoft DB LIST GRID 6.0(OLEDB)‏ 
Microsoft hieratical flex grid Control 6.0(OLEDB)‏ 


فى التعامل مع : 
(FLAT FILE)‏ 


و هی البيانات النصيه البسیطه والتی لا تحتوی على ای هيكل تنظيمى. 

وهى ايضا البيانات المراد تنقيتها واعاده صياغتها باى نظام مستخدم لقواعد البيانات مثل: 
ORACLE, SQL, ACCESS.‏ 

تفيد كلا من مكتبات ۸50 الفرعيه (الملحقات) فى عمليات هامه جدا بالنسبه الى المبرمجين 

او من يقومون بعمليه التنقيه لقواعد البيانات المنشأه مسبقا وذلك فى التحكم فى حجم البيانات 

وذلك من خلال عمليه : <<NORMALIZATION>>‏ 

وهى عمليه اعاده صياغه البيانات بالشكل الصحيح لتتطابق الظروف الملائمه وقت استخدام هذه 

البيانات. 

وايضا تجنب الملفات غير المطابقه والخاطئه. 
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تقليل مساحه قاعده البيانات وذلك بعمل تنقيه للبيانات من الحقول والصفوف الفارغه والمهمله 


وايضا توفير الوقت والجهد فى عمليه البحث عن البيانات . 


كما ذكرنا مسبقا ان مكتبه0 ۸0 تحتوى على العديدي من الخصائص والاستخدامات المتطوره 
وذلك لتسهيل عمليه التعامل مع البيانات 

فعندما ذكرت عنوان هذا الفصل وهو " استخدامات متطوره لمكتبه0 ۸5" 

لم اقصد التعامل مع امثله متطوره» وانما اردت فقط ذكر خصائص وامكانات هذه المكتبه والمكتبات 
الملحقه بها بقدر المستطاع حتى يتثنى للمتعامل بها بعد ذلك امكانيه احتواء اى تطبيق بسهوله 


انشاء الله. 


استخدام جمل الاستعلام ]1 5@Qفى‏ الربط بقواعد البيانات 
لقد ذکرنا مسبقا امکانیه مکتبه0 ۸5 فی استدعاء قاعده البیانات بعده طرق... 
من اهمها: 
طريقه الاستدعاء باختيار الجدول 
* طريقه الاستدعاء باستخدام جمل 8Q1‏ 
وهذه الطريقه مفيده فى حاله البيانات الضخمه» والمراد التعامل مع جزء فقط من بياناتها 
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فهى توفر الوقت والجهد فى طريقه الاستدعاء للجزء المطلوب فقط داخل الجدول. 
مثال: 
قاعده بیانات باسم”N۷]N۲0“‏ نرید ایجاد منها جدول باسم" ٤8S8‏ 1€8S10MاC°€"‏ 


وايضا ايجاد اسم العميل 4d١”‏ وص“ من خلال الحقلeد Contact ıa‏ 


الان بعد ان ذكرنا مسبقا خطوات التوصيل بقاعده البيانات 
ومن خلال الحدث 41x٤‏ ۸4€ وذلك من التبويب .°٥C0 04d 1 ype‏ 


نكتب جمله الاستعلام الاتيه كما فى الشكل التالى: 


General | Authentication Recordsource | Color | Font | 


Record ourcEe 
Command Type 


Table or Stored Procedure Name 
Command Text (SAL) 


SELECT FROM customers WHERE 
conlaclname ='maria anders" ; 
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SELECT * FROM customers WHERE contact name = ‘maria anders’; 


شرح الجمله: 


اخاطب الان مکتبه ۸50 واقول لها اختاری کل الحقول من الجدول إ٥‏ ٥)ءںءولکن‏ بشرط ان 


maria anders = contact يكوڻ ع141‎ 


% 


حيت: 
SELECT‏ = اختار 
ار كل الحقول 
FROM‏ = من الجدول 
=Customers‏ اسم الجدول 
=WHERE‏ عندما 
=Contact name‏ حقل داخل الجدول""بمعنى اسم العميل" 
nara and er=‏ = | ایيساوی او يطابق هذا النص "او هذا الاسم" 


وهذه الجمله يمكنك من خلالها اختیار ای جدول من خلال قاعده البيانات التى تتعامل معها او اى 
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بیان داخل ای جدول . 

حيث توفير الوقت والجهد فى الاستدعاء. 

ملحوظه: 

يرجى التأكد عند كتابه جمل Q1‏ 5بوضع المتغيرات داخل علامه التتصيص ؛ 

وایضا نهایه ای جمله استعلام بعلامه : 

بعد ان قمنا بكتابه الجمله نقوم الان باستدعاء مكتبه عرض البيانات الملحقه بمكتبه ۸50 
<<Microsoft DB GRID 6.0(OLEDB)>>‏ 

من قائم4٤ ٥٣٤:‏ م٥ء‏ ثم ربطھا بمکتبھ 50 ۸کما اسلفنا بالذکر 


وسوف نصل الى النتيجه التاليه باذن الله: 
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ContactName ContactTitle EERE‏ ا ی ب 


0 Fulterkiste | Maria Anders Sales Representative | Oberg 


| 4| d01 


نری الان لقد تم عرض الاسم الذى قمنا بالاستعلام عنه فقط والبيانات الملحقه به. 


وهناك العديد من طرق الاستعلام باستخدام 8Q1‏ سوف نوالى شرحها مستقبلا انشاء الله 


الان قد قمنا بفضل الله عرض معظم الخصائنص الهامه لمكتبه (8(٤ا۸00)0.‏ 


استخدامات مکتب+(8 E٥‏ [۸00.)0 فی التعامل مع البیانات 
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سوف نشرح الان باذن الله کیفیه تعامل مکتب+0 0 ۸مع قاعده بیانات نوع ۸٤٥٥٤88‏ 


وذلك باجراء العمليات الاتيه: 


Operation Description NO. 
Showing data”Form1.load” عمليه عرض للبيانات‎ 1 
Add new وهی عملیه اضافه سجل جدید‎ 
Save حفظ للسجل الجديد او المعدل‎ 3 
Delete حذف لسجل موجود‎ 4 
Move next التحرك للامام "لايجاد السجل التالى"‎ 5 
Move previous التحرك للخلف '"لايجاد السجل السابق"‎ 6 


نقوم بعمل قاعده بیانات مثلا باسم ال da†4."‏ 
ثم نقوم بانشاء جدول باسم ھځھل 18 0؟r¢p‏ 


ويحتوى على البيانات التاليه: 


FIELD NAME DATA TYPE 
name text 
phone text 

address text 


بعد ذلك نقوم بادخال بعض البيانات فى هذه السجلات 
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ثم نبدأً بالتعامل تحت بیئه cزوھط‏ 1ھuءز‏ 


ثم نقوم بانشاء مشروع قیاسی جدید وربط قاعده البيانات كما اسلفنا بالذكر مسبقا 


ثم نقوم بعمل ۸M‏ ۴۳0حتى نصل الى الشكل التالى: 


E1 Formî 


والمكونات هھی: 
Count. Tool‏ 
label‏ 3 
Text Box‏ 3 
Command Button‏ 5 
ADO.(OLEDB)‏ 1 
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ثم نقوم بربط کل ×0ط)×م)بما یماثلها فی الجدول aوtھول‏ 18رrs0¢مp‏ 


الى ان نصل بعد ذلك الى النتيجه التاليه: 


[samen hassan 


MoveN ext 


[0 09918437 


MovePrevious 


نحن الان قد قمنا بتنفيذ اول عمليه وهى عمليه عرض البيانات. 


2 - عملیه اضافه سجل جدید 


بعد ان قمنا باضافھ ہہ٤tںuط command‏ بعنوان Add‏ 
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سنقوم بكتابه الكود التالى بداخله: 


Private sub clickO من خلال الحدث‎ 
Adodc1.recordset.AddNew 
End sub 
عمليه حفظ سجل‎ - 3 


S۸۷۴ وفی داخل الزر‎ 
نكتب الكود التالى:‎ 
Private sub click () 
Adodc1.recordset. Update 
End sub 
عمليه حذف للبيانات‎ 4 
DELETE رjلl‎ Jخاد نكتب‎ 
الكود التالى:‎ 
Private sub click () 


Adodc1.recordset.delete 
End sub 


5 عمليه التحرك للامام "ايجاد بيان ملحق" 


لاتمام هذه العمليه نكتب فى الزر )×ءN‏ 0۷۵" 
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الكود الاتى: 


Private Sub Command6_ Click () 
On Error Resume Next 
Adodc1.Recordset.MoveNext 
End Sub 


5 عمليه التحرك للخلف "ايجاد بيان سابق" 
لاتمام هذه العملیھ نکتب فی الزر 0usذ۷٤‏ ۲م ٥0۷e‏ 
الكود الاتى: 
Private Sub CommandS_ Click ()‏ 
On Error Resume Next‏ 


Adodc1.Recordset.Move previous 
End Sub 


7 عمليه استد عاء البيانات 
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لا ينقص الان الا عملیه هامه جدا 


وهى عمليه ايجاد البيانات او البحث عن بيان معين فقط دون غيره 
ولاتمام هذه العمليه نتبع الخطوات التاليه: 

اولا نقوم بوضع زر على فورم المشروع ونسمیه مثلا وول 0۲٤‏ م٣1‏ 
ثم نقوم بكتابه الكود التالى فى الحدث 


Private sub Command4 click () 

Dim s As String 

s = InputBox ("enter the name”) 
Adodc1.Recordset.Find "name=' " + s4 * “ 
If Adodc1.Recordset.EOF Then 

MsgBox ("the name is not exist”) 
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Exit Sub 
End If 
End Sub 
شرح الكود‎ 
من المفترض انى اخاطب الان المكتبه‎ 
يشغل حيز من مساحه الذاكره‎ 5S واقول لها ان المتغير‎ 
سوف يقوم بفتح صندوق حوارى وهو نافذه على قاعده البيانات لايجاد‎ 5S وعند استدعاء المتغير‎ 
البيان المطلوب.‎ 
؟ادd ويتم ذلك برمجيا عن طريق الامر‎ 
Adodc1.Recordset.Find "name=' " + s+” “ “ من خلال الجمله:‎ 
فنحن نقوم باجراء بحث او استدعاء الان بمدلول الاسم.‎ 
ثم ننتقل الى تطبیق قاعده ۲1۲۴ وهی قاعده شرطیه کما نعلم»ای ملزومه بفعل امر من امرین على‎ 
الاقل » ويتم ذلك من خلال نص الجمله وهو الذهاب لايجاد المتغير $ فان لم يكن موجودا عند نهايه‎ 
الملفات 0[ فسوف يعطينى رساله اعتراضيه‎ 


بعد ذلك اقوم بانهاء الامر وانهاء القاعده والخروج من حيز امر هزا الزر. 


بعد قيامك بتشغيل التطبيق ستجد انك ستنفذ هذه العمليات بكل سهوله.... 
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كما فى الشكل التالى مثلا : 


i Formî ا‎ BX 


MoveN ext 
MovePrevious 


ala $ave delele | 


ففى هذا الشكل اقوم بتنفيذ امر الاستدعاء للبيانات بدلاله اسمائهم 


فان كان الاسم غير موجود سوف يعطينى الرساله الاعتراضيه الاتيه: 
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Project. 


the name is not exist 


وان كان الاسم موجودا سوف يتم الحصول عليه... 


وايضا من خلال الاوامر 


الاضافه والحفظ والحذف يتم اجراء هذه العمليات عند الحدث اع 


وکانت هذه هی طرق ادارہ قواعد البیانات مع مکتب+(8 ٤5‏ 0.)0 ۸50 عموما لا یشترط فیھا 


.۸٥€٣ ٤5S التعامل مع‎ 


* يمكنك ايضا التعامل مع قواعد بيانات اخرى من خلال0 ۸50 وذلك عن طريق مزود الخدمه وهو 
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المسؤل عن ربط اى قاعده بيانات باستخدام جمل ربط بهذه المكتبه. وهو موجود ضمن خصائص 

هذه المكتبه كما ذكرنا مسبقا 

او من خلال قائمه الخصائص فى cذوھط‏ 1ھuءذv‏ ومن خlاJ‏ الٺمر Connection string‏ 

حيث يمكنك الربط بینها وبين قاعده بیانات من نو عیه ۸٣۴‏ 0R۸عن‏ طریق الامر: 
Microsoft Provider OLE DB FOR ORACLE‏ 

وایضا قاعده بیانات من نوعیه ام۷ مء SQ]‏ من خلال الامر: 


Microsoft Provider OLE DB FOR SQL 


تم بحمد الله 


حمهوریه مصر العربیه 
القاهره 


المؤلف / 
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سامح حسن محمد سنوسی 


طالب بأكاديميه الجزيره لعلوم الحاسب واداره الاعمال 


قسم حاسب ألى - الفرقه الثالته 


ارحو ان اکون قد وفقت فی ذکر کل ما حال بخاطری حیال هذا الموضوع 
ومن الله الاستيعاب 

وعلى الله التواصل والتوصل... 

كما ارحو غض البصر عن بعض اخطائی... 


ولا تنسونا من صالح دعانکم... 


بسم الله الرحمن الرحيم 
"رب احعلنی مقیم الصلاه ومن ذریتی ربنا وتقبل دعاء * رب اغغر لی ولوالدی وللمؤمنین یوم یقوم 


الحساب" 


صدق الله العظيم 
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